home *** CD-ROM | disk | FTP | other *** search
/ Aminet 28 / Aminet 28 (1998)(GTI - Schatztruhe)[!][Dec 1998].iso / Aminet / util / boot / selector80.lha / Selector / browser / makefile next >
Encoding:
AmigaDOS Script File  |  1998-10-04  |  896 b   |  33 lines
  1. .key dir
  2. .bra {
  3. .ket }
  4.  
  5. failat 21
  6.  
  7. echo >ram:file.sel "title 'File Browser'"
  8. echo >>ram:file.sel "gap 0"
  9. echo >>ram:file.sel "settings off"
  10. echo >>ram:file.sel "flow right"
  11.  
  12. echo >>ram:file.sel "onexit exec 'delete >nil: ram:file.sel'"
  13. echo >>ram:file.sel "color yellow black"
  14. echo >>ram:file.sel "button Parent exec @execute browser/makefile *"{dir}/*"@ load ram:file.sel"
  15. echo >>ram:file.sel "color white"
  16. echo >>ram:file.sel "text Dirs:"
  17.  
  18. list >>ram:file.sel "{dir}" pat ~(#?.info) dirs lformat "button *"%n*" exec @execute browser/makefile *"{dir}%n/*"@ load ram:file.sel"
  19. if warn
  20.     copy >nil: browser/welcome.sel ram:file.sel
  21.     skip opa
  22. endif
  23.  
  24. echo >>ram:file.sel "color black"
  25. echo >>ram:file.sel "text Files:"
  26.  
  27. list >>ram:file.sel "{dir}" pat ~(#?.info) files lformat "button *"%n*" run £execute browser/what *"{dir}%n*"£"
  28. if warn
  29.     copy >nil: browser/welcome.sel ram:file.sel
  30. endif
  31.  
  32. lab opa
  33.